(nnfolder-generate-active-file): Don't use remove.

diff --git a/lisp/gnus/nnfolder.el b/lisp/gnus/nnfolder.el
index 7394994452b83afe5d1309f3aba5af647b9ed8c8..3eb3ff14b2081aef06cbd3b98844436c474524e3 100644 (file)
--- a/lisp/gnus/nnfolder.el
+++ b/lisp/gnus/nnfolder.el
@@ -740,7 +740,9 @@ time saver for large mailboxes.")
           (if oldgroup
               (nnheader-message 5 "Refreshing group %s..." file)
             (nnheader-message 5 "Adding group %s..." file))
-          (setq nnfolder-group-alist (remove oldgroup nnfolder-group-alist))
+         (if oldgroup
+             (setq nnfolder-group-alist
+                   (delq oldgroup (copy-sequence nnfolder-group-alist))))
           (push (list file (cons 1 0)) nnfolder-group-alist)
           (nnfolder-possibly-change-folder file)
           (nnfolder-possibly-change-group file)